LBL Z
CLRHOME
DISP "  REALLY BORED"," PRODUCTIONS II","","PROUDLY PRESENTS"
PAUSE
CLRHOME
DISP "FIND A THIEF 80","1. PLAY","2. STORY","3. QUIT"
INPUT "CHOICE:",A
IF A=1:GOTO A
IF A=2:GOTO B
IF A=3:GOTO 3
LBL A
10 -> DIM L1
RANDINT(1,9) -> B
IPART B -> B
FOR(X,1,10
RANDINT(1,100) -> C
IPART C -> L1(X)
IF X=B:5 -> L1(X)
END
FOR(X,1,10
CLRHOME
DISP "REGULAR:"
IF X=1
THEN
3L1(X)+5 -> D
DISP "3X+5=",D
END
IF X=2
THEN
5-L1(X)^2+12 -> D
DISP "5-X^2+12=",D
END
IF X=3
THEN
3L1(X)+L1(X)-10 -> D
DISP "3X+X-10=",D
END
IF X=4
THEN
(8L1(X)*5L1(X))-20(L1(X)^2) -> D
DISP "(8X*5X)-20X^2=",D
END
IF X=5
THEN
19L1(X)-(3^2*L1(X))+5 -> D
DISP "19X-3^2(X)+5=",D
END
IF X=6
THEN
((L1(X)-7L1(X))+L1(X)^2)/(2L1(X)) -> D
DISP "((X-7X)+X^2)/2X =",D
END
IF X=7
THEN
((L1(X)-5L1(X))+10)/(2+L1(X)) -> D
DISP "(X-5X+10)/(2+X)=",D
END
IF X=8
THEN
L1(X)-8+10L1(X)^2 -> D
DISP "X-8+10X^2 =",D
END
IF X=9
THEN
(L1(X)-8)^2/(3+L1(X)) -> D
DISP "(X-8)^2/(3+X) =",D
END
IF X=10
THEN
5(L1(X)+3)/L1(X) -> D
DISP "(X+3-0X^2)/(X/5) =",D
END
INPUT "ANSWER:",C
1 -> E
IF C (ISN'T EQUAL TO) L1(X)
THEN
CLRHOME
DISP "HE SHOT YOU..."
PAUSE 
GOTO C
END
IF C=L1(X)
THEN
CLRHOME
IF L1(X) (ISN'T EQUAL TO) 5:DISP "YOU'RE RIGHT."
IF L1(X)=5
THEN
DISP "HE'S CAPTURED."
PAUSE 
GOTO C
END
PAUSE
END
END
LBL B
CLRHOME
DISP "A THIEF TOOK THE","KEYS TO VAULT 5.","YOU GO QUESTION","REGULARS TO FIND","X=5 AND WIN. TRY","NOT TO GET SHOT."
PAUSE 
GOTO Z
LBL C
CLRHOME